#!/usr/bin/perl
# ifelse.pl
use warnings;

$input=<>;
if ($input >= 5 ) {
   print "The input number is equal to or greater than 5 \n";
} else {
   print "The input number is less than  5 \n";
}